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*PLEASC  NOTE.  T he  Federal  COBOL  Compiler  Testinn  Service  may  make  full 
ana  free  public  disclosure  of  tbe  Validation  Summary  Report  (VSR)  in 
accordance  * i t h the  "Freedom  of  Information  Act"  (5  ’J.S.C.  #552).  The 
results  of  this  validation  are  only  for  tbe  purpose  of  satisfying  United 
States  Government  requi rement s*  and  apply  only  to  tFp  Computer  System* 
Operatin''  System  release*  and  compiler  version  identified  in  the  VSR.  The 
COBOL  Com. piler  Validation  System  is  used  to  determine*  insofar  as  is 
practical*  the  deoree  to  which  the  subject  comoiler  conforms  to  the  Fed- 
eral COBOL  Standard.  Thus*  the  VSR  is  necessarily  discretionary  and  judo- 
mental.  The  United  States  Government  does  not  reoresent  or  warrant  that 
the  statements*  or  any  one  of  them*  set  forth  in  the  VSR  are  accurate  or 
complete.  The  VSR  is  not  meant  to  be  used  for  the  purpose  of  publicising 
the  findings  summarized  therein. 

For  information  concerning  this  compiler  you  can  contact  the  vendor’s 
designated  representative  named  below: 

Mr.  David  v.  Nixon 

Digital  Equipment  Corporation 

2f)U  Forest  Street 

^arl boro*  Massachusetts  0175? 
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SECTION  1.  INTRODUCTION 

1.1  Purpose  of  the  Validation  Summary  Report 

fhe  purpose  of  the  Validation  Summary  Report  (VS1?)  is  to  identify  individual 
COBOL  language  elements  whose  i mo  l erne  nt  a t i on  does  not  conform  to  federal  Stan- 
dard COECL  as  adopted  from  American  National  Standard  Proorammino  Lanouane 
COBOL#  X3. 2 3 -1974#  by  Federal  Information  Processing  Standard  71-1  (FIPS 
3JB  21-1). 

1.2  Preparation  of  the  VSR 

The  Validation  Summary  Report  is  rrp|'ared  by  analyzing  the  results  of  rjnnina 
the  COBOL  Compiler  Validation  System  (CCVS).  The  COBOL  Compiler  Validation 
System  consists  of  audit  routines  containing  features  of  Federal  Standard  COBOL# 
their  related  data#  and  an  executive  routine, (VP-rout im*)  which  prepares  the 
audit  routines  for  compilation.  Each  audit  routine  is  a COBOL  program  which 
includes  many  tests  and  supporting  procedures  indicating  the  result  of  the 
t est  s . 

The  testing  of  a compiler  in  a particular  hardware/oreratinq  system  environment 
is  accomplished  by  compiling  and  executino  each  audit  routine.  The  report  pro- 
duced by  each  routine  tells  whether  the  compiler  passed  or  failed  the  tests  in 
tre  routine.  If  the  compiler  rejects  some  lanojane  elements  by  terminating 
compilation#  oivi'ng  fatal  diagnostic  messaaes#  or  terminating  execution  abnor- 
mally# then  the  test  containing  the  code  the  comoiler  was  unable  to  process  is 
deleted  and  the  audit  routine  compilation  and  execution  repeated. 

The  compilation  listings  and  the  output  reports  of  t*e  audit  rout ines  con- 
stitute the  raw  data  from  which  the  members  of  the  r » r a l C^dPL  Comoiler 
Testing  Service  produce  a Validation  Summary  Renort. 

1.3  Organization  of  the  VSR 

The  Validation  Summary  Report  is  made  up  of  several  sections  the  contents  of 
which  are  described  below. 

a.  Section  ? summarizes  the  results  of  the  compilation  and  execution 
of  the  programs  comprising  the  C°POL  Compiler  Validation  System.  Section  2 

is  subdivided  into  a subsection  representing  each  level  of  each  module  defined 
in  American  National  Standard  Programmina  Language  COBOL#  X3. 23-1974.  Each 
subsection  contains  a list  of  all  of  the  lanauaqe  elements  which  must  be 
implemented  in  order  to  claim  support  of  that  l e v e i / modu  l e . The  list  of 
lanouaqe  elements  will  be  annotated  to  include  a description  of  both  syntax 
and  semantic  errors  detected  during  the  validation. 

b.  Section  5 - FIPS  PUB  21-1  defines  four  Federal  levels  of  the  COBOL 
Standard.  Section  3 of  the  VSR  lists  the  discrepancies  described  in  Section  ? 
oy  the  Federal  level  in  which  the  problem  occurs. 
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c . Section  A contains  information  which  describes  the  software  environ- 
ment in  which  the  compiler  was  tested.  This  includes  the  name  anb  version  of 
the  operation  system;  the  implementor-names  which  were  used  in  the  Fnvironment 
division  of  the  programs  comprising  the  CCVS;  the  options  used  with  the  com- 
piler; and  if  applicable*  information  regarding  the  use  of  compiler  optimiza- 
tion features. 

d.  appendix  A is  the  Validation  Summary  Working  Document*  a working 
oaper  resulting  from  the  compilation  and  execution  of  the  CCVS*  and  from  which 
the  V S A'  is  derived. 

1 . A Abstract  Covering  Compliance  to  American  Naticnal  Standard  Programming 

Language  C R S L 

Definition  of  an  Implementation  of  American  National  Standard  Proorammino 
Language  COBOL  (excerpts  from  Xl.?3-197A*  Chapter  1*  Section  1.5). 

An  implementation  is  defined  to  meet  the  requirements  of  the  American 
National  Standard  COBOL  specification  if  that  implementation  includes  a 
fully  implemented  specified  level  of  » a c h of  the  functional  processing 
modules  and  of  the  Nucleus  as  defined  in  this  Standard.  It  follows  from 
tnis  that*  in  order  to  meet  the  requirements  of  this  Standard*  an  imple- 
mentation must: 

a.  Not  require  the  inclusion  of  substitute  or  additional  language  ele- 
ments in  the  source  program*  in  order  to  accomplish  any  part  of  the  function 
of  any  of  the  standard  language  elements. 

b . Accept  all  standard  lamuage  elements  contained  in  a qiven  level 
of  a module  which  is  specified  as  being  included  in  the  implementation* 
except  as  specifically  exempted  (as  pertaining  to  specific  hardware  components 
for  which  support  is  not  claimed).  See  "Flements  that  pertain  to  Specific 
Hardware  Components"  below. 

These  points  are  of  particular  pertinence  in  two  areas: 

(1)  There  are  throughout  the  American  National  Standard  COBOL 
s oec i f i c a t i on  certain  language  elements  whose  syntax*  or  effect*  is  specified 
to  be*  in  part*  i mp l e ment or -de f i ne d . While  the  implementor  specifies  the 
constraints  on  that  portion  of  each  element’s  syntax  or  rules  that  is  indi- 
cated in  this  Standard  to  be  implementor-defined*  such  constraints  may  not 
include  any  requirement  for  the  inclusion  in  thp  source  program  of  sub- 
stitute or  additional  language  elements. 

(?)  When  a function  is  provided  outside  the  source  orogram  that 
accomplishes  a function  specified  by  any  particular  standard  COBOL  element* 
then  the  implementation  must  not  require*  except  for  Fnvironmpnt  Division 
elements*  the  specification  of  that  external  function  in  place  of  or  in 
addition  to  that  standard  lanouaae  element: 


The  following  qua l i f i c at i ons  apply  to  the  American  National  Standard  COBOL 
specification: 
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a.  There  are  certain  lenauaqe  elements  which  pertain  to  specific  types 
of  hardware  components.  In  order  for  an  implementation  to  meet  the  require- 
ments of  this  standard*  trie  implementor  must  specify  the  minimum  hardware 
cant inurat ion  required  for  that  implementation  and  th®  hardware  components 
that  it  supports.  Further*  when  support  is  thus  claimed  for  a specific  hard- 
ware component*  all  standard  lanouane  elements  that  pertain  to  that  component 
Tijst  re  i ir.p  l en  ent  ed  if  the  nodule  in  which  tney  appear  is  included  in  the 

i mp  l »ment  at  i on . Lanciuaqe  elements  that  pertain  to  specific  hardware  com- 
ponents for  which  sjpoort  is  not  claimed*  need  not  be  implemented.  However* 
the  absence  of  such  elements  from  an  imp l emert at i on  of  American  National 
Standard  COBOL  must  be  specified. 

b.  *n  implementation  of  American  National  Standard  C 3 3 OL  may  include 
the  ENTER  statement  or  not*  at  the  option  of  the  implementor. 

c.  *n  implementation  that  includes*  in  addition  to  a specified  level  of 
each  of  the  functional  processing  modules  and  of  the  Nucleus*  elements  or 
functions  that  either  are  not  defined  in  the  American  National  Standard  C 0 p 0 i 
specification  or  are  defined  in  a q i ven  level  of  a standard  module  not  other- 
wise included  in  the  implementation*  meets  the  requirements  of  this  Standard. 
This  is  true  even  thojoh  it  may  imply  the  extension  of  the  list  of  reserved 
words  by  the  implementor*  and  p r ? v°  n t proper  compilation  of  some  proorams  that 
meet  tne  reauireme.nts  of  this  Standard.  The  imnlementor  must  specify  any 
optional  lanouaqe  (lanquaqe  not  defined  in  a specified  level  but  defined  else- 
where in  the  Standard)  or  extensions  (lanauape  elements  or  functions  not 
defined  in  this  Standard)  that  are  included  in  the  implementation. 

d.  In  oeneral*  the  American  National  Standard  C 3 3 3 L specification 
specifies  no  upper  limit  on  such  things  as  the  number  of  statements  in  a pro- 
gram* the  numoer  of  operands  permitted  in  certain  statements*  etc.  It  is 
recoonized  that  these  limits  will  vary  from  one  imolementation  of  American 
National  Standard  OFOL  to  another  and  may  prevent  the  proper  compilation  of 
some  proorams  th3t  meet  the  requirements  of  this  standard. 
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The  lanauaee  elements  in  the  following  lists  deoend  on  implementor  defini- 
tions to  complete  the  specificaton  of  the  syntax  or  rules  for  the  elements. 

The  elempnts  whose  syntax  is  partly  i mo l emen t o r -de f i ne d are: 

F Cement  I mp  l ement  or -t) ef  i ne d Aspect 


SOURCE-CuwPUTEP  paragraph 
OBJECT-COMPUTER  paraqraph 
MEMORY  SIZE  clause 
alphabet-name 


c omnu t e r -na me 
computer-name 
integer 

implementor-name;  whether  imple- 
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mentor-names  are  provided. 
SPECIAL-NAMES  psraqraph  implementor-name 

ASSIGN  clause  implement  or-natie 


VALUE  OF  clause 
RERUN  clause 

CALL  and  CANCEL  statements 

COPY  statement 

ENTER  s t a t e m e n t 
Margin  R 
Area  B 

3uali*ication 

The  elements  whoso  effect  is  pertly 
6 l e m e o t 


i mp  l errent  or-nane;  whether  implementor 
names  are  provided. 

implementor-name  and  the  form;  the 
implementor  provides  at  least  one 
of  seven  soecified  forms. 

relationship  between  operand  and  the 
referenced  orogram. 

relationship  between  library-name 
text-name*  and  the  library. 

I amuaie-name 

The  location. 

The  number  of  character  positions. 

The  njmber  of  qualifiers;  at  least 
five  must  he  supported. 

implementor-defined  are: 

Implementor-Defined  Aspect 


alphabet-name  The  correspondence  between  native  and 

foreign  character  sets. 

implementor-name  switches  Whether  setting  can  chanoe  during 

execution. 

Representation  and  whether  automatic 
alignment  occurs. 

Representation  and  whether  automatic 
a l iqnment  occurs  . 

SYNCHRONIZED  clause  Whether  implicit  FILLER  positions  are 

generated;  their  effect  on  the  size 
of  group  items  and  redefining  items 


USAGE  IS  C'MPUT  ATI.1VAL 
clause 

USAGE  IS  INDEX  clause 


ACCEPT  statement 


aximum  size  of  one  transfer  of  data 
in  Level  1 Vuc  l eus . 


" 


— 
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DISPLAY 

statement 

' ax  i mum  size 

of  one  transfer 

0 f 

data 

in  Level  1 

N j c l e j s . 

Nurne  r i c 

test 

Representation  o f valid  sign 

i n 

the 

absence  of  the  SIGN  IS  SEDAR/'TB 
clause. 


Comparison  of  nonnurreric  items  Collating  sequence,  where  NATIVE  or 

i mo  1 e me nt o r -na me  collating  sequence' 
is  imolicitlv  nr  explicitly 
specified. 

Arithmetic  expressions  Number  of  places  carried  tor  inter- 

mediate resjlts. 


Elements  That  Pertain  to  Specific  Hardware  Components 

The  standard  language  elements  in  the  list  that  follows  pertain  to  specific 
types  of  hardware  comoonents.  These  language  elements  must  be  implemented 
in  an  implementation  of  American  National  Standard  COdOL  when  support  is 
claimed/  by  the  implementor/  tor  the  specific  t y p°s  of  hardware  components  to 
which  they  pertain/  and  the  module  in  which  they  are  defined  is  included  in 
tnat  implementation. 

Clement  Hardware  Component 


CODE-SET  clause 

MULTIPLE  FILE  TAPE  clause 
CLOSE. ..REEL/UNIT  statement 

CLOSE NC  REWIND  statement 

OPEN.. .REVERSED  statement 


OPEN NO  REWIND  statement 

OPEN .. .1-0  statement 
(Sequential  1-0  only) 

OPEN  EXTEND  statement 

RfcwRITE  statement 

(Sequential  I -0  only) 


Device  capable  of  support  inq  the 
specified  code. 

Reel 

Reel  or  mass  storage 

Reel  or  mass  storage 

Reel  with  the  capability  of  making 
records  available  in  the  reversed 
order;  m ass-storage  with  the  cap- 
ability of  making  records  avail- 
able in  the  reversed  order. 

Reel  or  mass  storage 

'lass  st  or  aqe 


k»el  or  mass  storaoe 
Mass  storage 
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SEND FEFORF/AFTER 

ADVANCING  statement 


USE.. .1-0  (Sequential 
I -C  only) 

WRITE BEFORE/ AFTER 

1 ADVANCING 

4 


Devices  capable  of  vertical  posi- 
tioning; devices  caoable  of  action 
based  on  mnemonic-names. 

A' ass  storage 

Devices  caoable  of  vertical  posi- 
tioning devices  capable  of  action 
based  on  mnemonic-name. 
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1.5  The  federal  COBOL  S t a n d a r a 

The  C'BOL  compiler  validation  results  enclosed  in  this  document  reflect  the 
degree  to  which  the  subject  COBOL  compiler  implements  the  federal  COBOL 
Standard.  The  Federal  COBOL  Standard  is  essentially  the  same  as  the 
American  .ational  Standard  Dronramming  Lanoume  COBOL/  XT. 23-1974/  with  two 
exceptions: 

The  Federal  COBOL  Standard  defines  4 levels  and  the  &VSI 
Standard  defines  onlv  the  minimum  COBOL  implementation  and 
the  full  standard.  Low  and  uigh  levels  of  the  Federal 
COBOL  Standard  (see  1.5.1)  correspond  to  the  above  two  ANSI 
levels  (minus  the  Peoort  Writer  module).  Two  additional 
levels/  low-intermediate  and  high-intermediate  have  teen 
included  in  the  federal  Standard  between  the  hiihest  and 
lowest  subsets.  These  additional  levels  accommodate 
hardware  which  cannot  support  the  full  standard/  hut  which 
is  capable  of  implementing  more  than  the  minimum'  standard. 

The  Report  writer  Module  is  not  contained  in  th°  Tpriera  l 
COBOL  Standard. 

The  Federal  CCPOL  Standard  requires  that  a compiler  contain  as  a minimum  the 
elements  specified  in  at  least  one  of  the  Federal  levels.  No  restrictions  are 
imposed  on  the  inclusion  of  selected  features  from  higher  levels  or  even  unique 
vendor  extensions.  Compatibility  amoung  various  implementations  of  a given 
level  cor.  tainino  additional  features  must  be  controlled  by  manaaement  imposed 
standards  and  restrictions. 

1.5.1  Federal  Standard  C n e 0 L Levels 

a.  Federal  Standard  COBOL  spec i f i cat i ons  are  the  lanouaoe  specifications 
contained  in  American  ‘.ational  Standard  Programming  Lang u age  COBOL/  X 3 „ 23-1974. 
For  purposes  of  the  Federal  Standard/  the  modules  defined  in  X3. 23-1974  are 
combined  into  four  levels.  Not  all  computers  are  large  enounh  to  accommodate  a 
COfiQL  compiler  containing  the  full  ANSI  Standard.  Therefore/  the  Federal 
Government  requires  that  all  compilers  acquired  by  its  agencies  contain  as  a 
minimum  one  of  the  four  Federal  levels/  deoendioa  on  machine  size/  confiojration 
and  user  needs.  The  knowledge  that  all  computers  will  supoort  at  least  one  of 
these  four  subsets  simplifies  the  task  of  developing  machine-independent  COBOL 
orograms  . 

b.  The  four  levels  of  Federal  Standard  COBOL  are  identified  as:  Low/ 
Low-Intermediate/  High-Intermediate/  and  High.  F ich  Federal  Standard  COBOL 
level  is  composed  of  either  the  high  or  low  levels  of  the  nucleus  and  ten  of 
the  eleven  Functional  Processing  Modules  (FPAs)  defined  in  Y 3 . 23-1974. 

The  tour  federal  Standard  COB^L  levels  are  reflected  in  the  following  table. 

The  numbers  in  the  table  refer  to  the  level  within  the  FPM  or  nucleus  as 
designated  in  X3. 23-1974/  and  a dash  in  the  table  denotes  that  the  corres- 
ponding Fpm  is  omitted. 
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Low 

Level 

Law 

Inter- 
m e d i ate 
Level 

M i oh 
Inter- 
mediate 
Lp  ve  l 

High 

Level 

NUCLEUS 

1 

1 

P 

i. 

F PIS s 

table  handling 

1 

1 

2 

2 

SEQUENTIAL  1-3 

1 

1 

t 

L 

RELATIVE  I — 0 

- 

1 

p 

? 

INDEXED  1-0 

- 

- 

- 

2 

SDRT-A'ERGE 

- 

- 

L 

REPOhT  WRITER 

- 

- 

- 

- 

SEGMENTATION 

- 

1 

i 

? 

LIBRARY 

- 

1 

i 

2 

DEBUG 

- 

1 

c 

c 

I MFR-PROGRA"' 

COMMUNICATION 

- 

1 

*> 

c 

? 

COMMUNICATION 

-> 

r 

2 

1.5.2  Conformance  to  Federal  Standard  COBOL 

4 compiler  i mo  l err  en  t e d in  conformance  to  Federal  Standard  COBOL  must  meet  at 
least  the  following  requirements. 

a.  The  implementation  must  include  all  of  the  lancuage  elements  of  at 
least  one  of  the  levels  of  Federal  Standard  COBOL. 

b.  The  implementation  must  meet  all  of  the  require i"nts  defined  in 
American  National  Standard  COBOL/  *5.23-19 74/  Section  1/  paraoraph  1.5/  Defini- 
tion of  An  Implementation  of  American  National  Standard  COBOL  which  is  oro- 
vided  in  section  1.4  of  this  VSR. 

c.  The  implementation  must  provide  a facility  for  the  user  to  optionally 
specify  a level  of  Federal  Standard  C^H^L  for  monitorino  his  source  proqram 

at  compile  time.  The  monitoring  will  be  an  analysis  of  the  syntax  used  in  a 
source  procram  aoainst  the  syntax  included  in  thf  specified  level  of  Federal 
Standard  COBOL.  Any  syntax  used  in  the  source  program  that  does  not  conform 
to  that  allowed  by  the  user  selected  level  of  Federal  Standard  COF^QL  will  be 
diagnosed.  The  syntax  diaonosed  as  not  con f or n i n i to  the  specified  level  will 
op  identified  to  the  user  throuoh  a diagnostic  messaoe  on  the  source  program 
listinn.  The  dia~nostic  message  will  contain/  at  least:  (1)  The  identification 

of  tfe  source  program  line  number  in  which  the  nonconf orninii  syntax  occurs/ 

(2)  the  i den t i f i c a t i on  of  the  level  of  Federal  Standard  C0301  that  supports 
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the  syntax  or  that  the  syntax  is  nonstandard  COBOL. 

1.6.  L'se  of  the  VSR 

The  federal  COBOL  Compiler  Testing  Service  may  maxe  full  and  free  public 
disclosure  of  the  Validation  Summary  Report  (VSR)  in  accordance  with  the 
"Freedom  of  Information  Act"  (5  U.S.C.  #552).  The  results  of  the  validation 
are  only  tor  the  ojrDOse  of  satisfying  United  States  Government  requirements# 
and  apply  only  to  the  computer  system#  operation  system  release#  and  compiler 
version  identified  in  the  VSR. 

The  COBOL  Comoiler  Validation  System  is  used  to  determine*  insofar  as  is 
practical*  thp  degree  to  which  the  subject  compiler  conforms  to  the  CObOL 
Standard.  T^us*  the  VSR  is  necessarily  discretionary  and  judgmental.  The 
Jniteo  States  Government  does  not  represent  or  warrant  that  the  statements* 
or  any  one  of  them*  set  forth  in  the  VSR  are  accurate  or  complete.  The  VSR 
is  not  meant  to  be  used  for  the  purpose  of  publicizing  the  findinos  summarized 
therein. 

1.7  Sources  of  Additional  Information 

FIPS  PUP  21-1  defines  the  Federal  COBOL  Language  Standard.  This  publication 
is  available  from  the  Office  of  APP  Standards  ►‘an agement  * National  Bureau  of 
Standards*  Washington*  D.  C.*  20234. 

The  detailed  COBOL  lanouaoe  specifications  are  niven  in  the  publication 
"American  National  Standard  Programming  Language  COBOL*  X 3. 23-1974"*  available 
from  the  American  National  Standards  Institute*  1430  Broadway*  New  York*  New 
York  1001P. 

An  explanation  of  the  COBOL  Compiler  Validation  System  is  contained  in  the 
CCVS  User's  Guide.  This  document  explains  how  to  run  the  compiler  validation 
system.  The  User’s  Guide  and  a n, agnetic  tape  containing  a cony  of  the  CCVS 
oregrams  are  available  from  the  National  Technical  Information  Service* 
Springfield*  Virginia*  22151.  (Ordering  information  can  be  obtained  from 
the  Federal  COBOL  Compiler  Testing  Service.) 

1.S  Requests  for  Interpretation 

Questions  regarding  this  VSR  or  the  CCVS  in  oeneral  should  be  forwarded  to  the 
FCCTS.  If  any  problem  cannot  be  adequately  resolved  through  the  FCCT^*  the 
request  for  i nt e r or e t at  i on  will  be  forwarded  to  the  Federal  COBOL  lot e r p re t a t i on 
Committee  for  final  resolution. 

A brochure  describing  the  validation  process  including  the  procedures  for 
requesting  a validation  and  resolution  of  questions  involving  interpretation 
of  the  current  Federal  Standard  is  available  from  the  Department  nf  the  “avy* 
Federal  CObOL  Compiler  Testing  Service*  Washington*  D.C.  ?337fc. 

1.9  Federal  Standard  COBOL  Approved  Interpretation 

The  National  Bureau  of  Standards  pjblished  in  the  Federal  Register  Vol.  41 
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Vo.  179/  September  14/  1976/  an  approved  interpretation  of  Federal  Standard 
COBOL  as  pertains  to  the  evaluation  of  arithmetic  expressions  in  the  COMPUTE 
statements.  This  interpretation  states  that  "si?e  of  the  intermediate  result 
field  is  implementor-defined.” 

Since  the  results  of  evaluating  arithmetic  expressions  are  not  predictable/  all 
COMPUTE  statements  and  IF  statements  containing  arithmetic  expressions  have 
oeen  removed  from  the  COBOL  Compiler  Validation  System. 

1 . 1 J Timeliness  of  the  Validation  Summary  Reports 

The  timeliness  of  the  Validation  Summary  Report  is  important.  Compilers 
and  their  related  operatinq  system  software  are  modified  several  times  a year. 
The  Compiler  Validation  System  used  to  validate  compilers  is  also  updated 
durino  the  life  of  the  system.  Therefore  to  ensure  that  the  latest  version 
of  both  the  vendor’s  compiler  and  the  Validation  System  are  the  latest  offici- 
ally released  versions/  check  with  the: 

Director 

Federal  CDB^L  Comoiler  Testing  Service 
Department  of  the  !*avy 
Washington/  D.  C.  2 03  7 6 

(202)  697-1247 

Please  use  the  Validation  Summary  Report  number  of  this  report  when 
correspond ino  with  the  Testing  Service. 
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SECTION 


2. 


DET6TLED  EVALUATION  OF  errors. 


j 


This  section  summarizes  tne  rpsults  of  the  compilation  and  execution  of  the 
orograms  comprising  the  COBOL  Compiler  Validation  System  CCCVS).  The  version 
of  the  CCVS  used  during  this  validation  is  shown  inside  the  front  cover  of  the 
VSR. 

Section  2 is  made  uo  of  a variable  number  of  subsections.  T he  number 
sections  is  dependent  on  the  Level  of  Federal  COB'LL  be i m validated, 
oe  a subsection  for  each  level  of  each  module  which  is  validated.  If 
level  of  a module  is  validated  then  tnere  will  oe  two  subsections  for 
module;  one  for  the  tow  level  and  one  for  the  hinh  level. 

A validation  of  the  low  level  of  Federal  Standard  COBOL  would  result  in  three 
subsections  beino  present.  One  for  Nucleus  lev°l  1/  one  for  Sequential  1-0  \ 

level  1/  and  one  for  Table  Handlina  level  1 . 

Each  error  or  deviation  noted  in  this  section  makes  reference  to  a program  or 
functional  COBOL  module  contained  in  Appendix  A (Validation  Summary  forking 
Document).  This  reference  provides  the  documented  results  ot  an  occurrence 
of  e r ro r s / de v i a t a i on s detected  during  the  runnino  of  the  CCVS  using  the  compiler 
within  the  environment  identified  within  this  document.  The  Validation  Summary 
Working  Document  is  presented  in  secuence  by  functional  module/  functional 
module  level  and  program  number  as  defined  below. 

Each  program  in  the  COBOL  Compiler  Validation  System  is  identified  by  a 5 - 
character  program  name.  The  name  associates  the  routine  with  the  functional 
orocess in  module  and  level  of  American  National  Standard  Prooramming  Language 
C 3 B 0 L tested  within  the  oroqram. 

■i 

The  five  character  name  has  the  oeneral  format  X X N v<  ft . The  first  two 
characters  are  alphabetic  and  identify  the  functional  ■nodule  tested  by 
the  program.  The  permissible  values  are; 


of  sub- 
The  r ° will 
the  high 
that 


C »!  - Communication 
Db  - Debug 

IC  - Inter- Program  Communication 

IX  - Indexed  1-0 

LB  - Library 

NC  - Nucleus 

RL  - Relative  I-P 

RP  - Report  Writer 

SG  - Segmentation 

S U - Sequential  I -0 

ST  - Sort-*rrqe 

Td  - Table  Handling 


The  third  character  of  the  audit  routine  name  is  either  a 1 or  7 , and 
identifies  the  level  of  the  functional  module  being  tested.  Fach  module  and 
level  is  represented  oy  several  programs.  The  fourth  and  fifth  characters  of 
the  prooram  name  are  sequence  numbers  for  Drograms  which  test  features  in  the 
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same  level  of  the  same  functional  processing  module. 

As  an  example*  the  prooram  name  NC21D  is  the  tenth  Dropram  in  the  series  of 
routines  which  test  the  second  level  of  the  Nucleus  module. 


iescription  of  Section  2. 

Eacn  error/deviation  is  noted  by  number  in  the  left  hand  maroin  opposite 
the  language  element  in  Question.  This  njmber  is  jsed  in  section  3 to 
categorize  errors  by  Federal  level  (See  1.5.1).  Inserted  directly  below 
the  language  element  is  a brief  description  of  the  error.  To  the  right  of 
the  langauqe  element  is  a page  reference  to  >3.23-1974/  American  National 
Standard  Pronr amming  Language  COdOL.  The  reference  at  tne  end  of  the 
description  of  the  error  is  to  Arpendix  A which  contains  the  detailed 
information  collected  durina  the  validation.  The  reference  is  marie  un 
of  the  routine  name  followed  by  an  A or  R (A  for  compile  time  or  syntax 
error  and  B for  execution  time  or  semantic  error)  and  a number  which  makes 
the  error  unique  in  Appendix  A. 
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E.  x amp  l e : 


2.1  Pucleus  Levpl  1 


_ 

Operational  symbols:  S V P 11-21 

2.1.9  

* The  seal  ins  character  * P * is  not  permitted  in  a 

* PI C TURF  character-strino. 

* (MC131.A.2) 


2.2  Sequential  1-0  Level  1 


2.1.9  represents  the  ninth  error  for  Nuclejs  Level  1 

11-21  represents  the  paqe  in  X 3 . 23-1974  whore  the  lannuane 
element  is  defined 

* Boxes  the  description  of  the  error/deviation 

MCI  01. A. 2 represents: 

Iron ram  name  - \C101 

Syntax  error  - A 
second  error  - 2 
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2.1  NUCLEUS  LFVFL  1 


Language  Concepts  1-75 

Characters  used  for  words  ...........  1-76 

0/  1 * ..  .*  9 

fi  * B * * 7 

- (hyphen  or  minus) 

Characters  used  for  punctuation 1-65 


" quot  at  i on  mark 
( left  parenthesis 
) right  parenthesis 
. period 
space 

= equal  sign 

Characters  used  in  editing 1-58 

B space 
0 zero 
+ plus 
minus 
C ^ credit 
DB  debit 

Z zero  suppress 

* check  protect 
$ currency  s i u n 

* comma 

. period 
/ stroke 


Separators.  . . . . . . . . . 1-75 

The  separators*  semicolon  and  comma*  are  not 

allowed  .....  ........  11—1 

C her  act er- st r i ngs 1-76 

COBOL  words . . . . 1-76 

Not  more  then  30  characters 

User-defined  words.  ............  1-76 

dat  a-name 

"u  st  begin  with  an  alphabetic  character  1 1 — 1 

viust  be  unique;  may  not  be  qualified.  . 11-1 


l ewe l- number 
mnemonic -name 
paraor  aph-name 
program-name 
routine -name 
sect  ion-name 


System-names 1-78 

computer-name 
implementor-name 
l an  nuane -n  am  e 

Fpserwed  words.  ..............  1-79 

Key  words 
Opt i on  a l words 

Figurative  constants 1-hP 

Z F R 0 
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Lt 


SPAC  F 

HIGH-VALUE 

LOW-VALUE 

3U0TF 

Special-character  words  . . . . . . . . . I -FO 
Literals.  .....  . ...  I - iO 


.onnumeric  literals  have  lenoths  from  1 
through  120  characters 

Numeric  literals  have  lengths  from  1 through 


18  digits 

PICTURE  c h a r a c t p r-s t r i nos  ..........  I-E2 

Comment-entries  .....  1-fP 

Reference  Format . . . . 1-105 

Sequence  number  ................  1-105 

Area  A 1-105 

Division  header  . . . . . . . . . . . . . . . 1-106 

Srction  header.  ...............  1-106 

Paragraoh  leader 1-102 

Data  Division  entries  . 1-107 

Area  B 1-105 

Paragraphs.  . . . . . . . . . . 1-107 

Data  Division  entries  ............  1-137 

Continuation  of  lines  .............  1-106 

Only  nonnumeric  literals  may  he  continued  . . 11-1 

Comment  lines  .................  1-10P 

Asterisk  (*)  comment  lines 
Stroke  l/)  comment  line 

Identification  Division  ...  1-94 

The  PROGRAM-ID  paragraph.  ...........  1 1 — 3 

The  AJTHOR  paragraph.  . . . . . . . . . . . . . II -2 

The  INSTALLATION  paragraph.  . . . . . . . . . . 1 1 —2 

The  DATE -WRITTEN  paragraph 11-2 

The  SECURITY  paragraph.  ............  1 1 -2 

Environment  Division.  . . . . . . . . . . . . . . 1-95 

The  SOURCE-COMPUT ER  paraqraph  11-5 

c ompu  t e r -nam  e 

The  OBJECT-COMPUTER  paragraph  II-* 

computer-name 
MEMORY  SIZE  clause 

PROGRAM  COLLATING  SEQUENCE  clause 
The  SPF C I AL-NAME  S paraqraph 1 1 -8 


implementor-name  IS  mnemonic-name 
implemontor-namp  IS  nnenonic-name  series 
ON  STATUS 
OFF  STATUS 


* Switches  are  not  supported. 

* (NUCLEUS) 
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a l phabet -name  clause 
CURRENCY  SIGN  clause 
DFCI'IAL  - POINT  clause 

Data  Division . 1-97 

Work ing-Storaqe  Section  ............  11-11 

The  data  description  entry.  11-12 

The  HLANk  WHFN  ZFRC  clause 11-14 

The  data-name  or  FILLER  clause.  . . . - . . . . 11-15 

The  JUSTIFIED  clause  (may  be  abbreviated  JUST).  11-16 

Level-number . . . . 11-17 

01  throuqh  10  (level  numbers  uust  He  2 din  its)  11-13 

77 11-11 

The  PICTURE  clause  (may  be  abbreviated  PIC)  . . 11—18 


* Succeed!  n q lines  of  code  are  rejected  when  the  word 

* PICTURE  (or  PIC)  is  the  last  word  on  a line. 

* ( N C 1 5 7 A ) 


Character-string  may  contain  ^ H characters.  . 11-1* 

Data  characters:  A X 9 . . . . 11-18 

Operational  symbols:  S V P . 11-21 

Fixed  insertion  characters.  . . . . . . . . . 11-21 

J (may  Ep  used  only  in  edited  items) 

0 

(may  be  used  only  in  edited  items) 

9 (currency  sian) 

♦ and  - 
DR  and  C R 
/ 

Reolaceneot  or  floating  characters.  .....  11-21 

d (currency  s i an) 

+ a n J - 
l 

* 

Currenry-  sirin  substitution.  .........  11-21 

Decimal  point  substitution.  . . . . . . . . . 11-21 

The  REDEFINES  clause  (may  not  be  nested).  . . . 11-27 

The  SITtY  clause 11-31 

The  SYNCHRO NIZFD  clause  (may  bp  aoor»viated  SYNC)  11-53 

The  LSAGt  clause 11-35 

COMPUTATIONAL  (may  be  aboreviated  C 0 "d D ) 

DISPLAY 

The  VALUF  clause 1 1-36 

literal 

Procedure  Division.  . . . . . . . . . . . . . . . 1-99 

Conditional  expressions  ............  11-41 

Simple  condition.  . . . . . . . . . . . . . . 11-41 

Relation  condition.  ............  11-41 

Relational  operators 


I — 


! 


! 
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Cnotj  greater  than 
(NOT!  LESS  THAN 
[NOT]  E 3 Li  A L TO 

Comparison  of  numeric  operands.  . . . . . 11-42 

Comparison  of  nonnumeric  operands  (ooer- 

ands  must  be  of  eaual  size ) .....  11-42 

Class  condition  . . . . . . . . . . . . . . 11-43 

NOT  option 

Switch -status  condition  ..........  11-44 

2.1.3  

* Switches  are  not  sur. oorted. 


* (See  2.1.2) 


The  arithmetic  statements  . . . . . . . . . . . 11-51 

Arithmetic  ooeran^s  limited  to  1*  digits 
Overlapping  od pranas.  - . . . . . . . . . . . . 11-51 

The  ACCEPT  statement  (only  one  transfer  of  data)  11-53 
The  ADO  statement  11-55 


i den t i f i e r / l i t e r a l series 
TO  identifier 
GIVING  identifier 
ROUNDED  phrase 
SIZE  ERROR  oh  rase 

The  A|_TER  statement  (only  one  prcc»!iure-ng»“).  . 11-57 

The  DISPLAY  statement  (only  one  transfer  of  d3ta)  11-59 


* DlSPLAYini  numeric  data  (both  numeric  data  items  and 

* the  numeric  data  within  an  alphanumeric  data  item)  resulted 

* in  commas  (’**)  hein-^  inserted  and  leadinn  zeros  being 

* truncated*  e . o . * 0123456769  was  displayed  as  123*456*76d. 

* (NC139  ?> 


The  DIVIDE  statement  ..............  11-61 

INTO  identifier 
AY  identifier/ literal 
GIVING  identifier 
ROUNDED  phrase 
SIZF  ERROR  nhrase 


The  ENTER  statement  ...............  11-63 

The  EXIT  statement  . . . . . . . . . . . . . . . 11-64 

The  GO  TO  statement  (procedure-name  is  required)  11-65 
DEPENDING  ON  phrase 

The  IF  statement  (statements  must  be  imperative)  11-66 
ELSE  nnras? 

The  INSPECT  statement  (only  single  character 

data  item)  .................  11-68 


TALLYING  phrase 
ALL 

LEADING 
CHARACTERS 
REPLACING  phrase 
ALL 
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I 1 


L F A D I N6 
FIRST 

CHARACTERS 

TALLYING  and  REPLACING  phrases 


The  yiovf  statement  11-74 

T)  identifier 
i dent ifier  series 

The  MULTIPLY  statement  11-77 


BY  identifier 
GIVING  identifier 
ROUNDED  phrase 
SWF  ERROR  phrase 


The  PERFORM  statement.  . . . . 1 1 - 7 d 

procedure-name 
THRU  phrase 
Tift'S  ohras? 

The  STOP  statement  . . . . . . II  - d 5 

literal 

RUN 

The  SUBTRACT  statement . . . . - . . II  - P 9 


identifier/literal  series 
FROY  identifier 
GIVING  identifier 
ROUNDED  phrase 
SWT  ERROR  phrase 


1 

1 

! 
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2.2  NUCLEUS  LEVFL  2 

All  elements  of  1 NUC  1/2  are  a part  of  ? 'fUC  1/2 


Lanquaqe  Concents 1-75 

Characters  used  for  punctuation.  . . . . . . 1-65 

/ comma 

; semicolon 

Characters  used  for  arithmetic  operations.  . . . . . . 1-52 


+ addition 

subtraction 

* multiplication 

/ division 

* * exponentiation 


Characters  used  in  relations  .............  I -66 

~ equal  to 

> oreater  than 

< l°ss  than 

Separators  ......  .....  1-75 

The  separators/  semicolon  and  comma/  are  allowed  . . 11-1 

Character-strinqs 1-76 

COBOL  words.  . . . . . . . . . . . 1-76 

User-defined  words  . . . . . . . . . . . . . . . . 1-76 

condition-name 
data-nane 

Need  not  Benin  with  an  alphabetic  character.  . 11-1 

'ay  be  qualified  if  necessary  for  uniaueness  . 1 1 — 1 

Reserved  words 1-79 

Figurative  constants  . . . . . . - I - B 3 


7 F R 0 S ; 7 E R 0 E $ 

SPACES 

HlGH-VALUFS 

LOW- VALUES 

SUOTE S 

ALL  literal 


Connectives.  ..................  1-79 

Qualifier  connectives:  OF/  I SI 

Spries  connectives:  / (separator  comma) 

and  ; (separator  semicolon) 

Looical  connectives:  A' D/  OF/  APD  RdT/  OR  POT 

Ou a l i f i cat  i on . ....................  I-c7 

Reference  format . . . . . . . . - . 1-105 

Continuation  of  lines  (continuation  of  words  and 

numeric  literals  is  allowed)  1 1 — 1 

Identification  Division.  ................  1-94 

The  DATE-COMPILED  paragraph.  . . . . . . . . . . . . . II-4 

r nvironment  Division 

Th«  SPEC  I al-NA^ES  paragraph 1 1 -B 

alphabet -name  clause 


2 2 
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literal 


Data  Division I-°7 

The  data  description  entry . . . . . I I - 1 ? 

Level-number  .....  .........  11-17 

HI  throuqh  4 9 (level-numbers  may  be  1 or  2 din its)  . 

66 

S3 

The  REDEFINES  clause  (may  be  nested)  . . . . . . . . . 11-27 

The  RENAMES  clause  (may  he  nested)  . 11-29 

data-name 

data-name  THRU  data-nan.e 

The  VALUF  clause 11-36 


literal-1#  literal-2 
literal-1  THRU  literal-2 
literal  range  series 


Procedure  Division . . I-c9 

Arithmetic  expressions . . . J 1-39 

Conditional  expressions.  . . 11-41 

Simple  condition  . . . . . . . . . . . . . . . . . . 11-41 

Relational  condition  ...............  11-41 


Relational  operators 

cnot:  = 

[V0T3  > 

[ N 0 T T < 

Comparison  of  non numeric  operands  (operands  of 


unequal  si??  are  allowed).  11-42 

Condition-nane  condition  . . . . . . . . . . . . . 11-44 

Sign  condition  . . . . . . . . . . . . . . . . . . 11-44 

NOT  option 

Complex  condition.  .................  11-45 

Logical  operators  AND#  OR#  and  NOT 

'eqated  simple  condition  . . . . . . . . . . . . . 11-46 

Combined  and  nenated  combined  conditions  . . . . . 11-46 

Abbreviated  combined  relation  condition.  . . . . . . 11-47 

‘ultiple  results  in  arithmetic  statements.  . . . . . . 11-51 

The  ACCENT  statement  (no  restrictions  on  thn  number 

cf  transfers  of  data).  . 11-53 

FROf*  phrase 

The  ADD  Statement.  11-55 

T t identifier  series 
GIVING  identifier  series 
CORRESPONDING  phrase 

The  ALTER  statement.  .................  11-57 

The  series  option  is  allowed 

The  COMPUTE  statement.  . . . . . . 11-5° 

identifier  series 
RQUNDE  ? phrase 
SI  7 1 Ek«OR  phrase 

The  DISPLAY  statement  (no  restrictions  on  the  number 

of  transfers  of  data).  . . . . . . . . . . . . . . 11—5? 


cc vsga-vsrt  rs 


UPON  phrase 

The  DIVIDE  statement  . 

IM 0 identifier  series 
GIVING  identifier  series 
REMAINDER  phrase 

The  g 0 TO  statement  (orocedure-name  nav  be  omitted) 

The  IF  statement  (nested  statements)  . . 

The  INSPECT  statement  (!i:ult  i -character  data  iters) 


The  compiler  did  not  execute  correctly  an  INSPECT  statement 
ccntair.inq  multi-character  operands  with  TALLYING  on  four 
operands  and  RFPLAC1N0  on  six  operands. 

( NC2 1 6 H ) 


The  vnvF  statement  . . . . 

CORRESPONDING  phrase 
The  MULTIPLY  statement  . . 
PY  identifier  series 
GIVING  identifier  series 
The  F*  ERF  OR  I*  statement.  . . 

UNTIL  phrase 
VARYING  phrase 
The  STRING  statement  . . . 

DELIMITED  series 
POINTER  phrase 
ON  OVERFLOW  phrase 
the  SUBTRACT  statement  . . 
FROM  identifier  series 
GIVING  identifier  series 
CORRESPONDING  phrase 
The  UNSTRING  statement  . . 

DELIMITED  HY  phrase 
POINTER  phrase 
TALLYING  phrase 
ON  OVEFxFLOW  nhrase 


■1  1 ■ 


m i — 
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2.3  TABLE  HANDLING  LFVFL  1 
Lanquane  Concepts 

User-defined  words 1-76 

i ndex-name 

Subscription  - 3 levels  . . . . . . . I - *9 

Indexing  - ? levels . I-dV 

Data  Division 

The  OCCURS  clause III-? 

inteqer  TI^ES 

INDEXED  BY  index- rve me  series 

The  USAGE  IS  INDEX  clause III-S 

Procedure  Division 

Relation  conditions  . . . . . . . . . . . . . . . Jll-o 

Comparisons  involvinq  index-names  and/or 
index  data  items 

'verlappina  ooerands.  HI-6 

The  SET  statement  . . . . . . . f I 1 — 11 

index-name /identifier  series 
i noe  x -na  tp 

Ur  BY  i den t i f i e r / i n t e oe r 
DDVIN  py  identifier/inteaer 
in  Tex -name  series 


?5 
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TAPLt  HANDLING  LFVEL  2 

All  plpments  of  1 T 3 L 1 * 2 are  a part  of  ? T a I.  1 ,2 
Data  Division 

The  OCCURS  clause 111-2 

integer-1  TO  intener-2  DEPENDING  ON  dpta-name 
ASCENDIN6/DESCENDI'»G  data-name 
data -name  series 
ASCENDING/ DESCENDING  series 


Procedure  Division 

The  SEARCH  statement.  ................  1 1 1 — 7 

VARYING  oh  rase 
AT  END  phrase 
WHEN  phrase 

The  SEARCH  ALL  statement 1 1 1 -7 

AT  END  phrase 
WHEN  phrase 
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2.1.  SEQUENTIAL  1-0  LEVFL  1 


L a ruj u a o e Concepts 

User-defined  words  . . . . . . . . . . . - . . . . . . 1-76 

f i le-nitp 
record-name 

I -0  status  ...............  IV-1 

Fnvironutnt  Division 

The  FILE-CONTROL  paranraph  . . . . . . . . . . . . . . IV - 4 
Thp  file  control  entry  . . . . . . . . . . . . . . . . IV -4 

SELECT  clause 


ASSIGN  TO  inDlrir,  entor-name  clause 
ORGANIZATION  I S SEQUENTIAL  clause 
ACCESS  "ODE  IS  SEQUENTIAL  clause 
FILE  STATUS  clause 

The  I-O-CDNTkOL  paragraph.  . . . . . . . . . . . . . . IV  - 6 

RERUN  clause 
S A !•',  E AREA  clause 
S A i* E A f ' F A series 


Data  Division 

File  Section . . . . . . . . . . . . . I V - 9 

The  file  description  entry  . . . . . . . . . . . . . . IV -1C 

The  record  description  entry IV- 9 

TR a BLOC K CONTAINS  clause IV-11 

integer  CHARACTERS 
integer  RECORDS 

The  CODE-SET  clause IV-1? 


* The  compiler  does  not  accept  the  "CC'DE-SET  IS  alphahet- 

* n „ m e " clause  if  the  optional  word  *1S*  is  missing. 

* ( S a 1 1 * A . 1 ) 


* Tne  compiler  required  a nonstandard  clause  (RECORDING  0 5 E 

* is  STANDARD-ASCII)  in  order  to  process  tape  files  in 

* accordance  with  the  American  National  Standard  Code  for 

* Information  Interchanne. 

* ( sans  a.?) 


Tfie  DATA  RECORDS  clause I V- 1 S 

data-name 
data-name  series 

The  LABEL  RECORDS  clause  IV-14 

STANDARD 

omitted 

The  RECORD  CONTAINS  clause  IV-10 

integer-1  TO  integer-?  CHARACTERS 

The  VALUE  Of  clause 1V-1^ 

implementor-nano  IS  literal 


i up l erne n t o r-name  IS  literal  series 
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Procedure  Division 

The  CL3SE  statement  (only  a sinole  file-name  may  appear 


in  a CLOSE  statement).  . . . . . . . . . . . . . 17-21! 

REEL 
UNIT 

The  OPEN  statement  (only  a single  file-name  may  appear 

in  an  OPEN  statement).  . . . . . . . . . . . . . 17-24 

INPUT 
OUTPUT 
1-0 

I P e P F A D statement  . . . . . . . . . . . . . . . . . . 17-21- 

INTO  identifier 
AT  END  phrase 

The  REWRITE  statement . . . 17-31 

FRnw  identifier 

The  USE  statement 17-32 


ExrFPTlON/EPRC'P  PPOCEDUPF 
ON  file -name 
ON  INPUT 
ON  nuTPUT 
ON  1-0 

The  WRITE  statement  ........  .....  17-34 

FROM  identifier 
BEFORF/AfTER  inteoer  LINFS 
BEFORE  / AFTER  PAGE 


?? 


<• 


I 
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2.6  SEQUENTIAL  1-0  LEVEL  ? 

All  elements  of  1 StQ  1*2  are  a part  of  7 SFu  1*2 


Lannjage  Concepts 
Special  reqister 
LINAGE-C  0(1  s'  T F R , 


1-80 
I V-  3 


Environment  Division 

The  FILF-CONTROL  paranraph  . . . . . . 
The  file  control  entry  . . . . . . . . , 
SFLFCT  clause 

OPT  10NAL  ph  rase 

RFSFKVF  integer  A R E A ( S ) clause 

The  I -0- CONTROL  paranraph. 

S A if  E RECORD  AREA  clause 
SAME  RECORD  AREA  series 
MULTIPLE  FILE  TAPF  clause 

Data  Division 

The  file  descriotion  entry 

The  BLOC*'  CONTAINS  clause  . . . . . . . 
integer-1  TO  inteoer-?  RECORDS 
inteqer-1  TO  inteoer-2  CHARACTERS 
The  LINAGE  clause  . . . . . . . . . . . 
FOOTING  phrase 
TOP  phrase 
POTTO*  r h r a s e 

The  VALUE  OF  clajse 

implementor-nape  IS  fata-nam« 
implementor-name  IS  data-name  series 

Procedure  Division 

The  CLOSE  statement  .....  

NO  REWIND/  REMOVAL/  or  LOC^ 
file-name  series 

T hi  e OPEN  statement . . . . 

input 

REVERSE  0 
NO  REWIND 
OUTPUT 

NO  REWIND 
EXTEND 


I V-6 


W-1<5 


I V - ? 4 


The  OPEN1  EXTEND  statement  fails  to  position  a file  to 
immediately  follodinq  the  last  topical  record  but  instead 
functions  as  thounh  an  0 P r N OUTPUT  statement  had  leen 
specified. 

<S02fl5  f) 


file-name  series 

INPUT/  OUTPUT/  1-0/  and  EXTEND  series 


ArV  ■ ",  • - • 
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The  USE  statement  . . . , . . . . „ . . . . . . . . . j 

EXCEPTION /ERROR  PROCEDURE  ON  file-nano  series 
EXCEPTION/ERROR  PROCEDURE  'N  rXTFhO 


The  compiler  floes  not  accept  the  USE.. .EXTEND  statement. 

(SQ21h  A) 


w R I T F statement  . . . . . . . . . . IV-34 

BEFORE/AETER  identifier  LINFS 

BE F nR e / A F T F R mnemonic-nane 

AT  END-OF-PArF  inrerat  ive-staterrent 


T hr  e WRITE'...3EFORF...FND“CF-PAGf  staterert  fails  to 
recoqnize  an  end-of-pane  condition  when  the  printer  is 
positioned  into  the  footina  area  of  the  page  body. 


( SO  2D  ? B ) 
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RELATIVE  I- 


Lannuaqe  Concects 

User-defined  words 
f i l e -name 
record-nairp 
1-0  status.  . . . 


Environment  division 

The  FILE-CONTROL  paragraph.  . . . . . 
Ihe  tile  control  entry.  ....... 

SELECT  clause 

ASSIGN  TO  implementor-name  clause 
ORGANIZATION  IS  RFLATIVF  clause 
ACCESS  MODE  clause 
SEQUENTIAL 
RANDOM 

FILE  STATUS  clause 

The  I-O-CONTROL  paranraph  , 

RESJN  clause 
SAME  AREA  clause 
SAV’E  AREA  series 


Data  Division 

File  Section.  ............ 

The  file  description  entry.  . . . . . 

The  record  description  entry.  . . . . 

The  FSLOCK  CONTAINS  clause 

integer  CHARACTERS 
integer  RECORDS 

The  DATA  RECORDS  clause  

dat  a-name 
data-name  series 

The  LAPEL  RECORDS  clause 

STANDARD 
n«I  ITE  D 

The  RECORD  CONTAINS  clause 

integer-1  TO  intener-?  CHARACTERS 

The  VALUE  OF  clause  

implementor-name  IS  literal 

it,  ole  mentor-name  IS  literal  series 


V- 1 5 


V-1  4 


V-1  6 


Procedure  Division 

The  CLOSE  statement  . 
WITH  LOCK 
file -name  series 
The  DFLETE  statement. 

INVALID  < E V phrase 
The  OPEN  statement.  . 
INPUT 
OUTPUT 
I - 0 


V-1  7 


V-1  o 


<*  • •>  » 

' 
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file-name  series 
I N P U T r OUTPUT*  and  1-0  series 


The  RE 4 0 statement.  . . . . , _ _ _ ^ V-?3 

INTO  identifier 

I AT  END  phrase 

j INVALID  KEY  phrase 

The  SEMITE  statement  . . . . . . . . . . . __  _ # _ V-?5 

FROM  i dent i f i e r 
INVALID  K F Y phrase 

i The  JSE  statement . V-33 


r x r r pticn/epror  ppotedure 
ON  til  e-name 
ON  INPUT 
ON  OUTPUT 
ON  I -0 

The  *R  I T E statement.  . . . . . . . . . . , _ _ _ _ __  V-3? 

FRO'*!  identifier 
INVALID  < F Y phrase 


3? 
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2.b  RELATIVF  1-0  LEVFL  ? 

All  elements  of  1 REL  P/?  are  a part  of  ? REL  0*7 
Environment  Division 

The  FILE-CONTROL  paragraph.  . . . . . . . V - S 

The  file  control  entry V-5 

SFLE  CT  c lausp 

RFSERVF  integer  AREA(S)  clause 
ACCESS  «0DF  IS  DYNAMIC  clause 

The  1-O-CONTRDL  paraaraph . - . . V- 7 

SANE  RFCORD  AREA 
SA  HE  RFCORD  ARTA  entries 

Data  Division 

The  file  description  entry.  . . . . . . . . . . . . . . V - 1 1 

The  ? L 0 C K CONTAINS  clause V-1? 

inteaer-1  TO  integer-?  RECORDS 
inteaer-1  TO  inteoer-2  CHARACTERS 

The  VALUE  OF  clause V-16 

i up l em en t o r -na me  IS  data-name 
implementor-name  IS  data-name  entries 

Procedure  Division 

The  READ  statement.  . . . . . . . . . , . . . . . . . . J -23 

NEXT  RfCvjRD 

The  START  statement  . . . . . . . . . . . . . . . . . . V - 2 8 

x KEY  IS  phrase 

INVALID  KEY  ohrase 

The  USE  statement  . . - . . . . . - . . . . - . . . . . V - 3 0 

EXCEPTION /ERROR  PROCEDURE 
?N  file-name  series 


CCVE74-VSR195 

?.V  INDEXED  1-0  Lb  VT  L 1 


Lannuate  Cjncppt  s 

Us e r- de  f i ne d words.  .................  1-76 

file-name 

rpcord-name 

1-0  status.  .....................  VI-? 

Environment  Division 

The  F ILF -COM  POL  paragraph VI-5 

The  file  control  entry Vl-5 

SFLFCT  clause 


ASSIGN  To  i mo l “men t or -name  clausp 
ORGANIZATION  IS  INDEXED  clause 
ACCESS  nODE  clause 


SEQUENTIAL 

RANDOM 

RECORD  KEY  clause 
FILE  STATUS  clause 
The  J-0-C3NTR0L  paragraph 
RF  PUN  clause 


A program  fails  tn  execute  when  restarted  from  a checkpoint 
file  created  through  the  use  of  the  RERUN  clause. 

(1X106  0) 


SAME  AREA  clause 
5 A M E AREA  series 


Data  Division 

File  Section . . . . V I - 1 1 

The  file  iescriotion  entry.  . . . . . . . . . . . . . VI-1? 
The  record  descriotion  entry VI-11 


The  BLOCK  CONTAINS  clause  

integer  CHARACTERS 
integer  RF  C ORDS 

The  DATA  kFCORDS  clause  . . . . . . . 
dat  a-name 
data-name  series 

The  LABEL  RECORDS  clause 

STANDARD 

OMITTED 

The  RECORD  CONTAINS  clause 

integer-1  TO  inteaer-?  CHARACTERS 

The  VALUF  OF  clause  

i mc>  l ement  or -nan  e IS  literal 
i in  p l emen  t o r-name  IS  literal  series 


VI-1  3 


VI-14 


VI-15 


VI-16 


VI-1  7 


Procedure  Division 

The  CLOSF  statement 
WITH  LOCK 
f i le-nnme  series 


VI-1  3 


Si  ' . ' •>  • *.» 
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The  DELETE  statement.  . . . . . . . . . . . . - . . . V I - 2 3 
INVALID  KEY  phrase 

The  OPEN  statement.  . . . . . . . . . . . . . . . . - VI-21 

INPUT 

OUTPUT 

1-0 

file -name  series 


INPUT#  OUTPUT#  an5  I-C  series 


The  kFAD  statement.  . . . . . . . . . . . . . . . . . V I - 2 A 
I\TO  identifier 
AT  END  pnrase 
INVALID  KEY  phrase 

The  R F J R I T F statement  . . . . . . . . . . . . . . . . VI-28 

F R 0 m i de  nt  i f i e r 
INVALID  KFY  phrase 

TheUSt  statement  . . . . . . . . . . . . . . . . . - VI-52 


EXCEPTION/FPROk  PROCEDURE 
3 V file -name 
ON  INPUT 
ON  OUTPUT 
ON  1-0 

The  wRITE  statement . . . VI-53 

FROM  identifier 
INVALID  < I'  Y ahrase 
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I N D F X E D I-P  LEVEL  2 

all  elements  of  1 INK  0/2  arc  a part  of  2 1 S x 3,2 


Environment  Division 

The  FILE-CONTROL  parr. n rap h VI-5 

The  file  control  entry  ...........  VI-5 

SFLFCT  clause 


RESERVE  integer  ARFA(S)  clause 
ACCESS  W0D  E IS  DYNAMIC  clause 
ALTERNATE  RECORD  KEY  clause 

. 1 

* The  ALTERNATE  RFC  CRD  KEY  clause  is  not  sun  porter). 

* < I X 2 3 5 A > 


WITH  DUPLICATES  phrase 

The  I-O-COVTRDL  oaraoraoh . . . . . . . VI-R 

SAME  RECORD  clause 
S«ME  RECORD  AREA  series 


Data  Division 

The  file  description  entry  ......  VI-12 

The  BLOCK  CONTAINS  clause Vl-H 

inteqer-1  TO  integer-?  RECORDS 
inteqer-1  TO  inteqer-2  CHARACTERS 

The  VALUE  OF  clause VI-17 

implementor-name  IS  da t a- name 


implementor-name  IS  dat  a-name  series 


Procedure  Division 

The  k E AD  statement . . . . . VI-24 

KEY  IS  phrase 
NEXT  RECORD 

The  START  statement.  . . . . . . . . . . . . . . . . . VI-30 

KEY  IS  phrase 
INVALID  KEY  phrase 

The  USE  statement.  . . . . . . . . . . . . . . . . . . VI-32 


EXCEPTION /ERROR  PFOCEDJRE 
ON  file-name  series 
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ORT- MERGE  LEVEL 


Language  Concepts 

User-defined  words 
f i l e - n a m e 


Environ  nnt  Division 

The  FILE-CONTROL  paragraph.  . . . . , 
Tne  file  control  entry.  . . . . . . , 
SFLFCT  clause 

ASSIGN  TO  i t p l omen t o r -naf e clause 


VI 1-2 
VI I -2 


Data  Division 

File  Section.  . . - . - . . . . . . . 

The  sort-meroe  file  description  entry 

Tne  DMA  RECORDS  clause 

The  RECORD  CONTAINS  clause 


Procedure  Division 

The  RELEASE  statement  ....... 

FRON  prtrase 

The  RET  UR',  statement.  . . . 

INTO  phrase 
AT  END  phrase 

The  SRT  statement  (only  one  SORT  statements  a STOP 
RU\  statement/  and  any  associated  incut-output 
procedures  allowed  in  the  nondeclarative 

portion  of  a program) . . 

KEY  d at  a -n  a. me 

data -name  series 
ASCENDING  series 
DESCENDING  series 
mixed  ASCENDING/DESCENDING 
I N 3 J T PROCEDURE  phrase 
THRU 

USING  p h r a s p 
OUTPUT  PROCEDURE  phrase 
THRU 

GIVING  phrase 


series 
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SORT-MEKGE  LFVEL  ? 

All  elements  of  1 SRT  0 r?  are  a part  of  2 SET  Dr? 


Environment  Division 

The  FILE-CONTROL  paragraph VII-2 

The  file  control  entry.  . . . . . . . . . . . . . . . V 1 1 - 2 
SELFCT  clause 

The  I-0-C0NTROL  paragraph VII- 3 


S«*E  RECORD  AREA  clause 
S A w E SORT/SORT-MERGE  AREA  clause 
S A * E series 

Procedure  Division 

The  'AERSE  statement  . . . „ . . . . . . . . . . . . . VII-P 
LEY  data-name 

data -name  series 
ASCENDING  series 
DESCENDING  series 
mixed  A S C E , ; D I V G / D E S C E K D I w G 
COLLATING  SEQUENCE  phrase 
USING  ohrase 
OUTPUT  PROCEDURE  phrase 
THRU 

GIVING  phrase 

Tne  SORT  statement  (multiple  SORT  statements  are 

permitted).  . . . . . . V 11-14 

COLLATING  SEQUENCE  ohrase 


; J 
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I 


■ : 


! 


i 


t 

i 


S F b ’ E N T A T I 0 M L F V c L 1 
Lamiuaae  Concepts 

User-defined  morris - • 

s e cur  e n t - nuTioer 

Procedure  Division 

Sequent -nj nbers  ........... 

Fixed  sea^ent-number  rannp  0 t hrounh  6 9 
\on-fixed  se q ne nt -numb er  ranoe  50  throuah  99 
ALL  sections  with  the  sane  senment-nj'nber  njst 
t>e  tooeth°r  in  the  source  or  c»n  ran 
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n 

M 

h 


I j 

[j 


LIBRARY  LFVEL  1 

Lanqjaie  Concepts 

User-defined  words  . . . - . 

text-name 

All  divisions 

The  COPY  statement  


CCVS7A-VSR1 °5 


LlPKARY  LEVEL  2 

All  elements  of  1 LIH  0/2  are  a part  of  2 LIS  D/2 
Lannuaoe  Concepts 

User-defined  words  . . . . . - - - * • • * - - 

l i brary-name 

All  divisions 

The  COPY  statement . - . - - * - - 

OF  library-name 
KEPLACIMCi  pnrase 


42 
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2.17  DEBUG  LEVEL  1 

2.17.1  

* The  Debut  ^ o i u l e is  not  supported. 

* (DEBUG  Module) 


Language  Concepts 

Special  registers.  . . . . - . . - - . . - • . - * - 1-  Ji 

Df  BUG ~ I TE"! X 1-1 

Environment  Division 

The  SOURCr-COv.PUTFR  paranraoh 

WlTd  DEBUGGING  "'OJF  clause Xl-3 

Prccedjre  Division 

USE  FOR  DEBUGGING  state-rent XI-4 

nroceriure-name 
procedure-nan e series 
ML  PROCEDURES 

Debugging  lines.  . . . . . . . . - - - - . • . . - * X I - 1 3 
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1R  DEFUG  LEVEL  ? 


2.U.1  - 

* The  Debug  “odule  is  not  supported. 

* (See  2.17.1) 


All  elements  of  1 DEB  Of?  are  a part  of  2 DED  0/2 
Procedure  Division 

USE  FOR  DEBUGGING  statement XI-' 

ALL  REFERENCES  CF  identifier  series 
file-name  series 
cd-natie  series 


44 
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2. INTFR-PROGR AM  COMMUNICATION  LFVFL  1 
Data  Division 

Linkage  Section 

Procedure  Division 

Procedure  Division  header.  . 
USING  phrase 

Tne  CALL  statement  

literal 

US  1 N 3 riata-name  series 
The  FXIT  PROGRAM  statement  . 


A5 


L 


•>  ..  • > 


xi  1-2 

>1 1-A 
x 1 1-5 

XII-*} 
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INTER-PROGRAM  COMMUNICATION  LEVEL  ? 

All  elements  of  1 I PC  0/?  are  a part  of  Z 1 p C 


Procetijre  Division 

The  CALL  statement.  XII-5 

identifier 
ON  OVERFLOW  phrase 

The  CANCEL  statement.  XII-7 
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Section  s.  cowpiier  status 

Section  1 . S explains  the  four  levels  of  Federal  Standard  COBOL.  This 
section  lists  the  discrepancies  described  in  Section  2 by  the  Federal  level 
in  which  the  problem  occurs.  All  errors  listed  for  a lower  level  are  also 
errors  in  any  higher  level/  even  though  they  are  listed  only  in  the  lower 
level.  The  paraqraoh  number  from  Section  2 is  used  to  reference  the  errors 
in  each  Federal  level. 

3.1.  Low  Leve l 

2.1.1  Switches  are  not  supported. 

2.1.2  PICTURE  as  last  word  on  line  results  in  error. 

2.1. A DlSPLAYed  numeric  data  is  incorrectly  edited. 

2.5.1  Compiler  rejects  CODF-SET  IS  ...  clause  w/o  'IS'. 

2.5.2  Non-standard  code  reauired  for  ASCII  (Xi.4)  tape  files. 

3.2.  Low -I nt ermedi at e Level 

2.17.1  Debug  module  is  not  supported. 

3.3.  Hi  oh- Intermediate 

2.2.1  INSPECT  statement  with  mu l t i - c h a r a c t e r operands  and  multiple 
TALLYING  and  REPLACING  operands  did  not  execute  correctly. 

2.6.1  OPEN  FXTFND  failed  to  position  to  following  last  record  in  file. 
2.0.2  USE. ..EXTEND  is  not  supported. 

2.6.3  WRITE... BEFORE. ..ENt)-0F-PA3E...  fails  eod-of-pace  condition. 

3.4.  Hinh  Level 

2.9.1  Checkpoint  file  specified  by  RFRUN  clause  unaole  to  he  restarted. 

2.10.1  ALTERNATE  RECORD  KEY  clause  is  not  supported. 
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SECTION*  4 SOFTWARE  E N V I R 0 \ v F \f  T . 

The  compiler  referenced  in  this  document  was  validated  us  inn  the  software 
environment  described  in  this  section.  When  usim  a modification  of  the 
described  environments  the  compiler  may  or  may  not  continue  to  conform  to  the 
Standard.  It  should  be  noted  that  durinp  the  validation  process/  an  attempt 
is  nade  to  validate  as  many  different  options  os  possible. 

The  use  of  com oiler  options/  implementor-namps  in  the  Fnvircnment  Division 
and  any  form  of  optimization  which  is  not  described  in  tnis  report  could  cause 
the  compiler  to  produce  a pro o ram  tnat  does  not  perform  according  to  the 
specifications  of  Standard  COBOL.  Only  the  environment  described  in  this 
document  nas  been  used  with  this  compiler  to  satisfy  the  r= qu i r enen t s of  FIPS 
PUFi  21-1  and  FP8P  101-32. 1305. la.  (Any  deviations  which  must  be  corrected  as 
oer  the  referenced  FP^R  are  described  in  Sections  ?.  and  3 of  this  report.) 

1.  Options  or  parameters  used  on  the  processor  call  statement  for  the  compiler 
The  following  options/parameters  were  used  during  the  validation. 


Options  specified: 

None 

Options  defaulted: 

N / A 

2.  FnvironnifPt  Division  i mp  l erne  nt  or -names  . 


Printer  destined  files 
LPT 

Tape  files 


'Tap 


Seciueritial  ^ass-storage  files 

DSK 

Random  Access  files 
OS*. 

Sort  files  (SD) 

DSK/DS</DSK 
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Snitch  names 

Mot  supported  by  the  compiler. 
Source  Computer  names 
OF  CSY  S T E Vl  - 2 0 
Object  Computer  names 
DECSYSTFtt-20 
RERUN  Clause  option 

REk'Jv  EVERY  10  RECORDS  0 F RR-FS1 


5.  Optimization.  The  compiler  may  or  rnav  not  have  optimization  features. 

If  there  was  an  optimization  feature  available#  it  was  used  Hurinn  the 
validation  process  ( during  a separate  execution  of  the  Compiler  Validation 
System)  to  determine  if  its  use  causes  the  compiler  to  produce  a program  which 
does  not  live  the  expected  results.  If  the  optimization  is  invoked  through 
the  compiler  call  statement  then  it  is  mentioned  in  peraoraph  1 above.  If 
it  is  invoked  through  the  introduction  of  syntax  in  other  than  the  Data 
and  Procedure  Divisions  of  the  source  rroorar  it  is  shown  below.  Optimization 
which  would  require  modification  to  the  Data  and  Procedure  Divisions  is  not 
considered  in  this  reaort  in  that  it  is  beyond  the  score  of  the  use  of 
standard  COBOL  and  the  validation  process. 

Optimization  was  not  considered  for  this  validation. 

4 . Compiler. 

C 3 L 7 4 Vorsion  V 
5.  ( rerat  inci  system. 

T0PS-2C  V2 
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3 .  ASCII  Validation 

ASCII  Validation  is  performed  by  runnina  a seouence  of  three  CCVS74  pro- 
grams C S C 1 1 8 , S Q 1 1 9 , S 3 1 2 i)  ) using  special  procedures.  The  purpose  of  this 
special  run  is  to  validate  that  in  fact  the  comp i l e r / ope r a t i no  system  heino 
tested  is  cat> able  of  processing  an  ASCII  tape  file  and  an  ASCII  card  file  pro- 
duced (in  accordance  with  the  appropriate  American  National  Standard)  on  another 
system.  there  is  .also  a magnetic  tape  and  a card  file  created  in  ASCII  durino 
toe  validation  which  will  be  taken  to  another  system  for  further  processing  to 
determine  whether  the  compiler/operating  system  being  tested  can  also  produce 
ASCII  files. 

This  testing  is  based  an  several  American  National  Standards  and  presumes 
their  support  by  the  compiler/operating  system  being  validated.  These  arp: 

1.  American  National  Standard  Programming  Lenqjaae  COPOL  X3.23-1°74 

The  COPE-FFT  clause  is  used  to  read  and  write  the  ASCII 
files. 

- The  P906RA*  COLLATING  SEQUENCE  clause  is  used  to  process  the 
data  in  ASCII  mode  as  well  as  native  mode. 

The  SIGN. ..SEPARATE  clause  is  used  for  s i a n » d data  and  all 
data  is  in  t>e  DISPLAY  (character)  mode. 

7 . American  National  Standard  Code  for  Information  Interch.ime 

(ASCII)  y3. 4-1966.  (Note  that  this  describes  the  code#  not  the 
lao fling  and  taoe  record ina  formats.) 

3.  American  National  Standard  Hollerith  Punched  Card  Code/ 

X3.26-1 970. 

4.  American  National  Standard  Pa onet i c Tape  Labels  for  Information 
Interchange/  X3. 77-1969. 

5.  American  National  Standard  Recorded  '"aonptic  Tape  for  Information 
Interchange  (333  CPI,  NRZI),  X3. 75-1  967. 

6.  American  National  Standard  Recorded  Magnetic  Tape  for  Information 
Interchange  ( 1 6 U 0 CPI,  PE),  X3. 3 9-1  973. 

The  language  of  the  1974  COPOL  Standard  provides  the  capability  to  accept, 
process,  and  produce  ASCII  code.  The  ASCII  Standard  describes  the  code  insofar 
as  the  bit  arrangement  and  configuration,  but  does  not  address  recordina  tech- 
niques, record  formats  or  any  labeling  scheme.  The  530  CPI,  NR7I  magnetic  tape 
recording  standard  was  used  to  establish  the  recording  density  and  technigues. 
(16UL  CPI,  PE  based  on  X3. 39-1973  "Recorded  Magnetic  Tape  for  Information  Inter- 
change" could  be  used  under  special  arrangements . ) The  taoe  labeling  scheme 
used  in  these  tests  is  based  on  Y3. 77-1969  hut  is  also  compatible  with  the 
revision  to  that  tape  label  standard.  Only  the  V0L1,  HDRl,  and  F0F1  labels  are 
used.  The  records  are  fixed  length  and  unblocked. 


CCVS74-VSK1 95 


■ 


During  the  validation/  the  Validation  ' an  age  r far  tne  federal  COBOL  Com- 
piler Test ina  Service  would  use  the  necessary  ASCII  lennetic  tape  and  card  files 
in  addition  to  the  normal  tape  files  associated  witf  a validation.  For  the 
ASCII  portion  of  the  validation  the  followino  steps  re  performed: 

1.  The  tape  file  and  card  deck  (produce-1  on  another  computer  system) 
are  used  as  input  to  several  programs  desinned  to  validate  whether 
the  system  h ? i n a validated  can  accept  and  process  ASCII  data.  Any 
chanoes  made  during  this  validation  to  the  source  programs  reading 
the  data  are  noted  below. 

? . A tape  file  and  card  file  are  produced  during  the  validation  which 
should  prove  to  be  identical  to  the  files  described  in  1 above. 
These  two  fil<»s  are  then  processed  on  a different  computer  system 
to  determine  the  deoree  to  which  the  system  beinq  validated  sup- 
ports the  ASCII  standard.  Any  chanaes  made  durinq  this  validation 
to  the  source  program  nroducino  the  data  are  noted  below. 

Results  for  this  Validation 

The  system  was  able  to  produce  but  unable  to  read  the  required  ASCII  tape 
files  oased  on  reference  2 aoove.  Only  the  first  record  from  the  input  man- 
net  ic  tape  file  provided  by  FCCTS  was  processed  before  an  end-of-file  condition 
was  encountered.  A total  of  50  records  should  have  been  processed. 

on  the  other  han-*/  the  output  tare  file  was  created  with  an  additional 
character  proceeding  each  record  on  the  file.  This  resulted  in  each  record  being 
offset  by  one  character  when  the  file  was  verified. 

The  f'CiO  CF*I  VRZI  magnetic  tape  recording  format  was  used  for  this  valida- 
tion (reference  5 above).  The  following  modifications  had  to  be  made  in  order 
to  fulfill  the  ASCII  validation  requirement. 

1.  The  tape  labeling  standard  (reference  4 above)  is  rot  supported 
by  the  T'oeratino  System  used  rlurinm  the  validation.  An  unlabeled 
tape  file  was  used  as  input  and  the  LABEL  RECORDS  clause  in  each 
cf  the  source  programs  was  modified  to  reflect  OMITTED  labels. 

2.  The  nonstandard  clause  "RECORDING  'COE  IS  ST  AN D ARD -ASC 1 1 " was 
added  to  the  SELECT  statement  of  each  of  the  tape  files  in  order 
to  use  the  ASCII  code  described  in  reference  ? above.  (Note  - 
The  CODE-SET  clause  in  the  File  Description  Entry  which  should 
have  accomolished  this  function  did  not/  thus  the  introduction 
of  the  nonstandard  RECORDING  'ODE  clause.) 
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APPENDIX  A 

VALIDATION1  SUMMARY  W'OKCING  DOCUMENT 


A - 1 This  cDsendi*  is  a w o r k i m paper  produced  durinp  the  validation 

and  documents  the  results  of  the  compilation  and  execution  of  each  of  the 
proarans  comprising  the  CCVS.  The  results  contained  herein  are  based  on 
t ns  use  of  tne  compiler  within  the  Validation  Environment  identified  in 
this  appendix.  This  appendix  (Validation  Summary  Workinp  Document)  is  not 
Dsrt  of  the  official  Validation  Summary  Report  (VSR)  and  is  not  intended 
to  reflect  in  any  way  the  compiler's  usefulness  or  deoree  of  conformance 
to  the  lancuaae  specifications. 

The  reader  of  this  appendix  should  keep  in  mind  that  the  same  o r o - 
olem  area  may  appear  in  more  than  one  pronram,  but  is  considered  only  as  one 
single  discrepancy  and  as  such  is  reflected  only  once  in  the  body  of  the 
VSR.  (The  VSR  will  in  turn  only  reference  the  first  occurrence  of  the 
problem  in  the  appendix.) 

This  appendix  is  divided  into  two  parts.  The  first  oart  describes 
the  Validation  Environment.  The  second  part  of  the  document  is  divided  into 
categories  of  information:  compilation  and  execution  results. 

The  reference  document  for  C d B 0 L is  FIPS  PUB  21-1  (X3. 23-1974). 
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DEBUG 

D31Q1 


v C D ML  E 

thru  D B 1 U5»  D32H1  thru  D32H4 


Thp  test  set  for  this  nodule  was  not  run  since  the  standard  DERUG  <13DULE 

has  not  been  implemented  in  this  compiler. 
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I VTE  k-PRGGKA'-l  C 0 MMUN  I C 6 T I ON  *■  LFVM.  1 
ICin  thru  I C 1 1 5*  I C 1 5 1 / I C 1 1)  2 
A . C t>isp  i l at  i en 
o errors  . 

Execution 
No  failures. 
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I \ T E K - P R (’  G R A v,  COvi*timCATID\l,  LEVEL  2 
l C 231  thru  1C20S 

A.  Compilation 
\o  errors . 

H . Execution 

fo  failures. 
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I \D  E XE  D I “0#  LEVEL  1 


1X131  thr  j I X 1 U b 


A . C orr.p i l at  ion 


No  errors. 


B . Execution 


I Xl'JO 


'o  t a i l u r o s 


A.  Compilation 


jo  errors . 


B . Execution 


The  program  tails  to  execute  when  restarted  from  the  checkpointed  file 
created  through  the  use  of  the  RERUN  clause. 


«.  Compilation 


r o errors 


p.  Execution 


No  failures. 


m 


. • viy$  ■; 


CCV^7'.-v/SRl«5 


IMDEXFD  1-0/  L F V E L 2 
1X201  thrj  IX?  u 4 

A . Compilation 
No  errors. 

B . Execution 

No  failures. 

1x205  thru  1X205 

A . Compilation 

In  1X205  throjoh  JX205#  all  references  to  ALTERNATE  RECORD 
K H Y s were  rejected  as  "IMPROPER  CLAL'SEs". 

B . Execution 

I x 2 0 5 through  1X205  were  not  run  because  of  ALTERNATE  KEY  tests 
(not  supported). 
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LIBRARY#  LEVEL  2 
L 3 2 L1 1 thru  Ln2P5 

a . Comp i l at  ion 
\'o  errors. 

B.  Execution 

\o  fail urcs . 

L B 2 0 6 

A . C omp  i I at i on 
Ro  errors. 

B . Execution 

LB2C6  had  one  test  failure  because  that  test  involved  the  use  of 
debucj  lines  which  are  not  supported  by  the  compiler. 

L32  37 

A . Comp i l at i on 
* o errors. 

B . Execution 

H o failures. 
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MUCLEUSw  LtVEL  1 
MC101  thru  NCI  UR 

A . Compilation 

All  references  to  hardware  switches  were  optioned  out  prior  to 
validation  since  the  system  ^ o e s riot  provide  switches. 

H . Execution 

So  failures. 

H C 1 1N 

A.  Compilation 
No  er  ror s . 

B . Execution 

In  \C1D9/  MCI*/  and  NC204  all  tests  involvino  the  ClSPl.AYinn  of  numeric 
dnta  items  failed.  Tne  correct  and  computed  results  are  as  follows: 

TEST  CORRECT  RESULTS  COi-.PlITED  RESULTS 

DI ST- TEST-3  3123456789  123,456,780 

CIS  E' - TEST-7  ...1CU123456789A...  . . . 1 Cl  23, 456, 78° A . . . 

DISP-TEST-13  ...  E 0102030405  ...  ...  E 12345  ... 

MC11G  thru  N C 1 2 Q , MC151  thru  NC156 
A . Compi l at  ion 

All  references  to  hardware  switches  were  optionen  out  prior  to 
validation  since  the  system  does  not  provide  switches. 

f* . Execution 

No  failures. 

* MCI  37 

. A.  Compilation 

In  NCI  57  and  VC  20  5 when  the  word  PICTURE  (or  3IC)  is  the  last  word 
on  a line  of  source  code  within  the  EICT'IRE  clause  the  compiler  rejects 
the  succeeding  line  of  source  code  indication  that  a PICTURE  and 
positive  integer  are  renuired.  In  NC157  the  PICTURE  clause  and  L0NG- 
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Tt  ST-3  which  tests  this  construct  were  deleted  in  order  to  obtain  a 
clean  compile.  In  NC2J5  all  blank  lines  within  the  flaoaed  PICTURE 
clauses  were  deleted. 

B.  Execution 

to  failures. 

N C 1 5 <:- 

A . Compilation 
s o errors, 
e . Execution 

See  SCI  39 . 

M C 1 5 V thru  NC165 

A . C OTp i l at  ion 
So  errors. 

B . Execution 

No  failures. 
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NUCLEUS,  LEVEL  2 

NC2C1  thru  NC205 

A . Compilation 
No  errors. 

R . execution 

o failures. 

N C 2 0 A 

A . Compilation 
N o errors. 

B.  Execution 
See  NCI  09. 

N C 2 0 b 

A . Compilation 
See  NCI  57. 

R . E xecut ion 

No  failures. 

f:2U6  thru  NC21S 

A . Compi l at  ion 
No  errors. 

0 . Execution 

No  failures. 

N C 2 1 6 

A . Compi l at i on 
No  errors. 

H . Execution 


In  NC  ? 1 6 , the  followinci  INSPECT  test  is  executed 
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I M S D E C T identifier-1  TALLYING  identifier-?  FOP  ALL 
identifier-3  F^R  LFADIN6  'AH* 
identifier-4  FOR  CHARACTERS  BEFORE 
identifier-5  FOR  CHARACTERS  AFTER  * AL  * 
REPLACING 

FIRST  * L * 0V  * 7 7 • AFTER  INITIAL  ’AL' 

FIRST  *340'  BY  * 111 ' AFTER  'L  ' 

LEADING  'BAD*  BY  * 111 * B r F OR  F INITIAL  *Q* 
FIRST  ’BAD*  BY  *7  7 7 * PF  FORE  INITIAL  'Z* 
FIRST  ’BAD*  BY  * Z Z Z * AFTER  'ALL  1 
ALL  ' . * BY  *1*  AFTER  'AL*. 


Tne  initial  contents  of  ident  ifer-1/  PICTURFd  as  * ( F 7)  / is: 

AH  YES  AH  YES  tv  . C . FRITOES  HERE.  ANYONE  J HO  MATES 
DOGS  AND  RIDS  CAN  NOT  BE  ALL  BAD. 

Tne  test  gave  the  following  error  indications: 

COriHJTFD  t/  ALU  F fORRECT  VALUF 


ident ifier-1 

identifier-3 
ident ifier-4 
identifier-5 


(last  eight  char, 
final  value) 


A L Z Z B A D Z 


AL7Z7Z7Z 


For  identifer-1/  since  the  ooundary  for  comparison  in  the  second 
REPLACING  phrase  (AFTER  *L  * ) is  established  before  ' L * is 
replaced  by  * 7 Z * (first  REPLACING  clause)/  'bad*  will  indeed 
be  matcneri  and  replaced  by  * 111* . [See  11-71/  6(c). 3 

for  identifier-3/  the  second  TALLYING  for  l e a d i n n • A h • will 
never  particioate  in  a comparison  because  each  'a*  in  the  first 
TALLYING  clause  operation  is  matched  prior  to  the  'AH*  comparison. 
The  match  of  *A*  terminates  the  comparison  cycle  on  the  'A*  and 
starts  a new  comparison  cycle  on  the  character  that  is  immediately 
to  the  right  of  the  matched  'A*.  CSee  11-70  5(c)  and  11-71  6(c). 1 

For  identifier-4/  whenever  an  *A*  match  is  made  by  the  first 
TALLYING  Clause/  the  third  TALLYING  clause  is  not  performed/  so 
the  count  of  "CHARACTERS  BFFORF  ,.,M  is  13  (or  15  - 2)  and  not 

15. 

For  identifier-^/  and  for  the  same  reason  as  above/  the  number 
of  "CHARACTERS  AFTER  * A L * " is  5 and  not  6/  since  the  *A*  in 
the  last  si*  characters  of  the  string  is  matched  by  the  first 
TALLYING  Clause/  and  thusly  is  not  eligible  for  matchina  by  the 
fourth  TALLYING  clause. 
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KELATIVF  1-0,  LEVEL  1 
RL101  thru  RL109,  RL151  thru 

A.  Compilation 
No  errors. 

B.  Execution 


RL153 


No  failures 
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RELATIVE  1-0,  LEVEL  ? 

RL2J1  tnru  RL205 

A.  Compilation 
No  errors. 

9.  Execution 

No  failures. 
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SEGMENTATION*  LEVEL  1 
SGI 01  thru  Su1U6 

A . Corrp  i l at  ion 
No  errors. 

3 . Execution 


\o  failures 
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SEGMENTATION#  LEVFL  ? 
S S 2 0 1 thru  S G 2 G 

A . Compi I at i on 
n o errors. 

P . Execution 


No  failures. 


CC\/S74-VS3195 


SEQUENTIAL  ACCESS,  LEVEL  1 

S Q 1 0 1 thru  SU117 

A.  Compilation 
No  errors. 

^ . Execution 

No  failures. 

S 3 1 1 M # S011»/  and  SalPD 

a.  Compilation 

1.  1 1 Sail?  and  SL120,  fatal  errors  were  flawed  on  the  construct 

"C3DF-SET  ASCII -C0DF" 

located  in  the  file  descriotion  (FD)  for  a sequential  file.  In 
each  case  when  the  optional  word  *15'  was  added  the  compiler 
accepted  the  syntax  of  the  statement  containing  the  CODE-SET 
clause. 

2.  In  S311 S 3 1 1 9 r and  S Q 1 ? 0 the  nonstandard  clause  "RECORDING 
MODE  IS  STAND ARD-ASCTI"  had  to  he  added  to  the  SFLECT  statements 
for  the  files  which  produced /read  ASCII  tape  files  during  the 
ASCII  validation  of  the  Compiler/Operating  System.  The  CODE- 

ET  clause  in  the  File  Descriotion  Entry  was  present  for  these 
tape  files  and  the  use  of  the  nonstandard  clause  should  not 
have  been  necessary. 

b . Execution 

No  failures. 

S3121  and  SC151  thru  S3155 

A.  Compilation 
No  errors. 

B . Fxecution 


No  failures. 
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SEQUENTIAL  ACCESS,  LEVFL  2 


SS2Q1 

A.  Compilation 
No  errors. 

B . Execution 

No  failures. 

S 3202 

A . Comp i l at  ion 
No  errors. 

B.  Execution 

In  SG’202,  S3213,  and  SG21A  th»  execution  of  all  WRITE.  ..BEFORE... 
EN'D-CE-PAGE  statements  failed  to  execute  the  end-of-paae  phrase  on 
an  end -of-oaqe  condition  when  the  orinter  was  oositioned  into  the 
footing  area  of  the  page  body. 

S3233  and  SG204 

A . C omp i l a t i on 
No  errors  . 

B.  E xecut ion 

No  failures. 

SG2U5 

A . Compi l at  ion 
Ho  errors. 

8.  Execution 

SQ205  creates  magnetic  tape  and  mass  storage  files  of  75D  records 
each.  Then  each  file  is  closed  and  reopened  with  an  OPEN  EXTEND 
statement  and  an  additional  250  records  are  written  on  each  file. 
SQ205  failed  to  execute  properly  when  a orematjre  end-of-file  exit 
was  taken  on  a normal  read  operation. 

S3206  thru  SU21? 

A.  Compilation 
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No  errors. 

B.  Execution 

No  failures. 

S2213  and  SG214 

A . Comp i l at i on 
No  errors  . 

B.  Execution 
See  SQ202. 

53215  tnru  SQ217 

A . Comp i l at i on 
No  errors . 

P.  Execution 

No  failures. 

S Q Z 1 1 

A.  Compilation 

The  compiler  rejected  as  invalid  the  statement: 

USE  AFTER  ERROR  PROCEDURE  EXTEND 

indicating  that  it  was  in  conflict  with  a second  USE  statement  which 
followed  it.  This  USE  statement  and  SE3-TEST -3D1  which  tests  this 
construct  were  deleted  in  order  to  obtain  a clean  comoile. 

B.  Execution 

No  failures. 


7? 


V Lu  I 


» i . . 


CCVS74-VSR195 

SOnl-Mfcf  e *wOtLt»  LEVI  I.  J 
SI701  t*ru  ST215 

* . Ccnj) ilat  ion 

No  errors. 

B . E x e cu t ion 


No  fait  ures 


CCVS74-VSU95 


: 

, 


I 


T *.  £'  L E -H  A > P L I \ 0 ''[HUF»  LEVTL  1 
TH101  tl.ru  Till  1 1 « TH151»  THIS? 
A.  Compilation 
No  errors. 

P.  execution 

No  failures. 


ccvs7<.-vs*m 


TABLE -HA!  OLI*G  t'fl/LE,  LEVEL  2 


A.  Ccn-pilation 


errors 


B.  Execution 


“o  failures 


